(jka-compr-insert-file-contents):

If enable-multibyte-characters is nil, decode as raw-text.

diff --git a/lisp/jka-compr.el b/lisp/jka-compr.el
index 58453869f92872707ebf5c9ac75314757f98b608..f66b84291c2b0f453321d20dbadd94ecf7fc2e03 100644 (file)
--- a/lisp/jka-compr.el
+++ b/lisp/jka-compr.el
@@ -504,6 +504,10 @@ There should be no more than seven characters after the final `/'."
              size start
               (coding-system-for-read
               (or coding-system-for-read
+                  ;; If multibyte characters are disabled,
+                  ;; don't do that conversion.
+                  (and (null enable-multibyte-characters)
+                       'raw-text)
                   (let ((tail file-coding-system-alist)
                         (newfile
                          (jka-compr-byte-compiler-base-file-name file))